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INSTANT 6400/6500/6600 SIMULA 

CONTROL DATA^ 6000 SIMULA is a dynamic general purpose 
programming language for algorithmic applications; the language has 
a powerful simulation capability. Based on ALGOL-60, SIMULA is 
an extension of Control Data 6000 ALGOL. 

SIMULA operates under control of the SCOPE operating system, and 
has the following capabilities: 

Simulation of discrete event systems - processes interrelated 
by events, dynamically evaluated, rather than by permanent 
relationships 

Readable language 

Classes - structured compound objects extend the structure 
concept of PL/1 

Scheduling algorithms 

Extensive library capabilities - tracing facilities for 
debugging, random drawing, data analysis and library 
facilities of Control Data 6000 ALGOL 

Flexible input/output 

List-processing 

Prefixing - class names prefix program blocks and make 
the class capabilities available to the block 
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6000 SIMULA ELEMENTS 

Number Format 


±d l d r ' ■ d j' d i+ 1 d j+ 2 " d nl 0 ±e 1 e 2 - - e m 


real : J 


integer : j ±mm 


magnitudes: 


0 < i nteger <1.3 X 1 O' 


322 


imm. nn 
±mm. nn^ Q±ee 


-294 222 

3.1 X 10 *< real <1 .3 X 10 J 


Precedence of Operators 


first: t 

second: X / 

third: + - 

fourth: < < = >> 7 ^ = = =/= js, jn 

fifth: “1 


sixth: a 

seventh: v 
eighth: ‘d 

ninth: = 


Virtual Quantity Specifiers 

label, switch , procedure, and <type> procedure 

Blanks 

Not significant except within a text or character constant. 

Blocks 

Maximum nesting: 32 levels 

Identifiers 

Maximum length: 256 characters 
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PROCEDURES 


Specifications are required for all formal parameters; maximum 
number of formal parameters 63. 

Procedure body may be replaced by code n. 

Transmission Modes for Class Parameters and Procedure Parameters 


Parameter 


Transmission Mode 

by 

Value 

by 

Reference 

by 

Name 

real, integer, Bool., char. 

D 

//// 

Ot 

ref 

//// 

D 

Ot 

text 

O 

D 

ot 

real array. Boolean array, 
integer array, char, array 

o 

D 

ot 

ref array, text array 

//// 

D 

//// 

procedure 

//// 

Dt 

//// 

label 

//// 

Dt 

//// 

switch 

//// 

Dt 

//// 


O Optional mode 

D Default mode 

//// Forbidden for class & procedure parameters 

transmission 

t Forbidden for class parameters transmission 
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STANDARD PROCEDURES 


Object Handling 

Name 

Type 

Detach 

procedure 1 

Resume 

procedure 1 

Set Handling (Simset) 

Sue 

reference procedure 

Pred 

reference procedure 

Out 

procedure 

Follow 

procedure I 

Precede 

procedure 1 

Into 

procedure 

First 

reference procedure 

Last 

reference procedure 

Empty 

Boolean procedure 

Cardinal 

integer procedure 

Clear 

procedure 

Simulation 


Idle 

Boolean procedure 

Terminated 

Boolean procedure 

Evtime 

real procedure 

Nextev 

reference procedure 

Time 

real procedure 

Hold 

procedure 

Passivate 

procedure 

Wait 

procedure 

Cancel 

procedure 

Current 

reference procedure 


Avoid within process objects 


Dummy statement if object has 
no set membership 

Dummy statement if object has 
no set membership or referenced 
object is none 

Dummy statement if referenced 
object is none 


Procedure names are 
recommended reserved 
names. 
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Utility 



Character Accessing 

Name 

Type 


Name 

T yP e 

Accum 

procedure 

Pos 

integer procedure 

Text Handling 


Setpos 

procedure 

Sub 

text procedure 

More 

Boolean procedure 

Strip 

text procedure 

Getchar 

character procedure 

Length 

integer procedure 

Putchar 

procedure 

Main 

text procedure 



Editing 




De-editing 



Editing and De-editing 
operate through 
Putchar and Getchar 


Putint 

procedure 

Getint 

integer procedure 

Putfix 

procedure 

Ge treat 

real procedure 

Putreal 

procedure 

Getfrac 

integer procedure 

Putfrac 

procedure 
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Input/Output Procedures 


Name 

Type 

Name 

Type 

Sysin 

reference procedure 

Sysout 

reference procedure 

Open 

procedure 

Close 

procedure 

inimage 

procedure 

Outimage 

procedure 

Endfile 

procedure 



Inchar 

character procedure 

Outchar 

procedure 

inint 

integer procedure 

Outint 

procedure 

Inreal 

real procedure 

Outreal 

procedure 

Infrac 

integer procedure 

Outfrac 

procedure 

Intext 

text procedure 

Outtext 

procedure 

Lastitem 

Boolean procedure 

Outfix 

procedure 

Directfile Procedures 


Printer Output 

Locate 

procedure 

Line 

integer procedure 

Location 

integer procedure 

Lines Per 
Page 

procedure 

Interrupt Control 

Spacing 

procedure 

Manint 

procedure 

Eject 

procedure 

Arthoflw 

procedure 



Parity 

procedure 
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Standard Library Procedures 


Random Drawing 

Character Handling 

Name 

Type 

Name 

TyP e 

Draw 

Boolean procedure 

Rank 

integer procedure 

Randint 

integer procedure 

Char 

character procedure 

Uniform 

real procedure 

Digit 

Boolean procedure 

Normal 

real procedure 

Letter 

Boolean procedure 

Psnorm 

real procedure 



Negexp 

real procedure 

Text Generation 

Poisson 

integer procedure 

Blanks 

text procedure 

Erlang 

real procedure 

Text 

text procedure 

Discrete 

integer procedure 



Histd 

integer procedure 

Data Analysis 

Linear 

real procedure 

Histo 

procedure 



Standard Functions 

Abs 

integer/real procedure 


Sign 

integer procedure 



Sqrt 

real procedure 



Sin 

real procedure 



Cos 

real procedure 



Arc tan 

real procedure 



Ln 

real procedure 



Exp 

real procedure 


Transfer Function 

Entier 

integer procedure 
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CLASSES AND CLASS ATTRIBUTES 

Set Handling 

| SIM5ET 
1 LINKAGE 

HEAD (subclass of LINKAGE) 

LINK (subclass of LINKAGE) 

Object Scheduling, Generation and Execution 

I SIMULATION (subclass of SIMSET) 

J PROCESS 

Input/Output 

DIRECTFILE 
J INFILE 
OUTFILE 

PRINTFILE (subclass of OUTFILE) 
jji IMAGE (attribute of FILE) 

Standard SCOPE File Names 

Standard input 
Standard print output 
Standard punch output 
Standard binary punch output 
Load-and-go (non-segmented) 

Segmented program 

Internal SIMULA compiler files 


! 


||| INPUT 
||| OUTPUT 
||| PUNCH 
j PUNCHB 
LGO 

| SEGMENT 
INTERM1 
||| INTERM2 
||j LIBRARY 
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SIMULA CODING 


A source deck for compilation is in the form of cards, or card images. 
A source deck may be a SIMULA program or a SIMULA source 
procedure. Source decks are stacked consecutively one behind the 
other, following the SCOPE control cards. The 'EOP 1 of the last 
source deck must be followed by a card containing FINIS in columns 
10-14. If no compilation of a source stack is requested (G and R 
options), the source input stack and FINIS cards must be omitted. 

Simula Control Card 


SIMULA (cyc^c ^.. .,0^) 

SIMULA,c.,c„,c 0 ,.. .,c . 

I z. o n 


SIMULA. 

Each parameter has the form c or c=fn where c is any sequence of 
1-7 characters beginning with one of the parameter letters defined 
below. For example, L and LIST are equally acceptable for the 
list parameter, fn is the file name; If =fn is not specified, the 
standard file name associated with each parameter is used. Except 
for the I parameter, the absence of any parameter suppresses the 
corresponding option. If I is omitted, source input is on the standard 
input device. 




PARAMETERS 

| Source input (same as absence of I unless =fn is included). 
Standard file name is INPUT. 

L List source input. Diagnostics are printed even if source 
listing is suppressed. Standard file name is OUTPUT. 

X Object program in standard relocatable binary (non-segmented) 
load-and-go form. Standard file name is LGO. 

P Object program in standard relocatable binary (non-segmented) 
punched form. Standard file name is PUNCHB. 

S Object program in segmented form. Suppresses any X option 
but not P option form of the object program. Standard file 
name is SEGMENT. This file must be a disk file. 

R Execute the object program in segmented form. If the S option 
is included also, the segmented program compiled is executed. 
If the S option is not included, the segmented program is 
assumed to exist already, and all options (I, U, G in particular) 
are suppressed. The source stack must be completely empty. 
Standard file name is SEGMENT. This file must be a disk file. 

U User subprogram input supplementary to I. May be used only 
when the S option is included. Standard file name is LGO. 

G User subprogram input exclusively. May be included only 
when the S option is included. Suppresses any explicit or 
implicit I option. The source stack must be empty. Standard 
file name is LGO. Only one of the options U or G may be 
included. 

A List the assembly language encoded form of the object code in 
standard assembly language listing format. Standard file name 
is OUTPUT. 

B Punch the assembly language encoded form of the object code 
in standard assembly language card format. Standard file 
name is PUNCH. 

N Suppress array bounds checking in the object program. No 
file name required. 
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DATA SET CARDS 


Data set cards appear as the first or only cards of the object-time 
data on the standard input device. DATASET, appears in columns 
] -8. Parameters are separated by commas, blanks may appear any¬ 
where. 

Data Set Define Card 

DATASET, dn=file-name, Dd, B 

dn alphanumeric string of up to 7 characters beginning with 
a letter. If dn is used in generation of an object of 
class FILE, the SCOPE file, file-name, is to be 
referenced. 

file-name SCOPE file-name 

Dd D2 sets density to 200 bpi, D5 to 556 bpi, D8 to 800 bpi. 
If omitted, or DO, density is dependent on operator or 
installation control 

B Binary mode, if omitted, BCD 


Data Set Equate Card 


DATASET, d n] =.dn 2 

dn.j and dn 2 are character strings of up to 7 characters beginning 
with a letter. 


Data Set End Card 


DATASET,END 

This card indicates the end of data set information and must be 
included even if there are no other data set cards in the deck. 
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Standard Simula Data Set Cards 

Two data set cards are supplied by the SIMULA system for SCOPE 
standard input and outputdevices. 

DATASET, SYS IN = INPUT 
DATASET, SYS OUT = OUTPUT 

The standard input/output devices may be referenced by the names 
SYS IN and SYSOUT and do not require data set cards. 
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PROCEDURE SOURCE DECK 











COMPILE SOURCE INPUT , LIST, EXECUTE 
SEGMENTED OBJECT PROGRAM 


























COMPILE WITHOUT EXECUTION SEVERAL 
SOURCE DECKS; LIST AND PUNCH BINARY 



2nd procedure source deck 


1st procedure source deck 


program source 


9 / SIMULA,L,P 


/ JOB,P2,CM30000,T100 













sis -'k.'-;"*. ■ 


• . 


COMPILE SOURCE INPUT , LIST GENERATED 
PROGRAM AND EXECUTE 




(||| ^/DATASET, END 
1]_j/ DATASET,SIMPUN=PUNCH 
/ D AT AS E T 7 SIMT A P E =S IMT A P E, D5 I 
























COMPILER DIAGNOSTICS 


ALGOL SYMBOL 

own and string not available. 

ARITHMETIC OVERFLOW 

Evaluation of an expression involving constants results in an 
arithmetic overflow; condition is detected only if the result 
is subsequently used. 

ARRAY BOUND TYPE 

Array bound expression is not arithmetic. 

ARRAY BOUND - LOCAL 

Variable specified for array bound is declared at same 
level as array. 

ARRAY OR SWITCH CALL 

Identifier used as an array or switch has not been so 
declared. 

ARRAY SIZE - NEG OR ZERO 

Computed array size is negative or zero. 

ARRAY, SWITCH, PROCEDURE 

Too many subscripts or switch elements or formal or actual 
parameters. 

BYPASS OVERFLOW 

Capacity of compiler to handle forward references exceeded. 
CALL PARAMETER 

Undeclared or untyped parameter in a procedure call. 

CALL PARAMETER COUNT 

Procedure is called with wrong number of parameters. 

CHARACTER CONSTANT 

Illegal external representation of a character symbol. 
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'CODE' INTEGER 

Literal following symbol code is not an integer. 
'COMMENT 1 

Symbol comment in an illegal position in source text. 
COMPOUND DELIMITER 

Hardware representation of a SIMULA symbol is incorrect 
e.g., ('BIG1N'). 

CONFLICTING VIRTUAL 

Conflicting virtual specification. 

DECLARATION CAPACITY 

Too many variables declared in a block structure. 

DECLARATION CODE O-FLOW 

Capacity of compiler to store labels, procedures, etc., for 
declaration code exceeded. 

DELIMITER 

Incorrect delimiter in source text for the particular contex; 

DELIMITER IN COMMENT (MESSAGE) 

Statement may have been bypassed because of a missing 
delimiter (such as ; following an end) . 

DELIMITER MISSING 

Delimiter expected at this point in source text not found. 
DOUBLE DECLARATION 

Identifier declared more than once in same block heading. 
DOUBLE SPECIFICATION 

Formal parameter specified more than once in same proce¬ 
dure heading. 
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DOUBLE DEFINED 

Two or more separately-compiled procedures with same 
name found during preparation of segment file. 

'END'S MISSING 

More begin than end symbols when 'EOP 1 encountered. 

FINIS GEN. BY PAR. ERR EOR CARD 

FINIS (end of source stack) forced at this point by parity 
error or EOR card in source input. 

'FOR' CONTROL VARIABLE 

Control variable of for statement of incorrect kind or type. 
FORMAL MISSING 

Value or specification appears for an identifier not in 
formal list. 

IDENTIFIER OVERFLOW 

No room in available memory to store complete list of 
identifiers (symbol table overflow). 

'IF' CLAUSE TYPE 

Expression following an if symbol must be Boolean. 

'IF' EXPRESSION TYPE 

Expressions following symbols then and else in if statement 
must be same type. 

ILLEGAL CHARACTER 

Illegal character (external BCD 12g) in source text. 
ILLEGAL PREFIX 

Some system classes cannot be used to prefix a block. 

INCOMPLETE ENTRY TABLE 

Incorrect Entry Point Table. 
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INCOMPLETE LINK TABLE 

Incorrect Linkage Table. 

INCOMPLETE REPLICATION TABLE 
Incorrect Replication Table. 

INCOMPLETE TRANSFER TABLE 
Incorrect Transfer Table. 

INSTRUCTION OVERLAP 

Amount of code generated by a simple arithmetic or 
Boolean expression exceeds the capacity of the compiler. 


LABEL 

Identifier used as a label not declared. 

LOAD ADDRESS 

Load address in text table out of range. 

LOCAL VARIABLE OVERFLOW 

Too many local variables defined in same block. 

LONG IDENTIFIER (MESSAGE) 

Identifier exceeds 256 characters. 

MISSING DECLARATION 

Undeclared identifier. 

MISSING PROGRAM 

Program appears to be missing because of absence or 
misspelling of a delimiter which begins compilation 
(e.g., begin) . 

MORE THAN ONE PROGRAM 

More than one main program found during preparation of 
segment file. 


22 




NAME SPECIF 


name specified for formal parameter does not permit by 
name transmission. 

NEW SEGMENT WITHIN TEXT TABLE 

Text table overlaps two segments. 

NO 'CODE 1 INTEGER 

Integer expected after symbol code is missing. 

NO MAIN PROGRAM 

Only code procedures found during segmentation. 

NO MATCH VIRTUAL 

Conflicting virtual specifications are illegal: types and 
kinds must coincide. 

NOT SUBORDINATE 

Conflicting virtual specifications are illegal: qualifications 
must be classes of same prefix branch. 

NUMBER SIZE 

Number exceeds floating-point capacity of machine. 

NUMBER SYNTAX 

Number incorrectly punctuated. 

OPERAND 

Incorrect operand in source text for the particular context. 
OPERAND MISSING 

Operand expected at this point in source text not found. 
OPERAND OVERFLOW 

Capacity of compiler to handle operands within the same 
statement exceeded. 



PARAMETER COMMENT 

Parameter comment which replaces a comma in a procedure 
declaration or procedure call incorrectly formed. 

PREFIX LOOP 

Class structures must be trees. 

PREFIX NOT CLASS 

Prefix of a class not a class identifier. 

PROCEDURE IDENTIFIER 

Identifier in a procedure call not declared as a procedure. 

PROGRAM BEGINS (MESSAGE) 

Line at which program compilation begins (appears with 
every compilation). 

PROGRAM ENDS (MESSAGE) 

Line at which program compilation ends (appears with every 
compilation). 

QUALIFIER NOT CLASS 

The qualification of reference variable is not a class 
identifier. 

REDECLARATION CAPACITY 

Capacity of compiler to handle similarly-spelled identifiers 
in a nested block structure..exceeded. 

REFERENCE OUTSIDE SEGMENT ' 

Invalid addressing found during segmentation. 

REPLICATION ADDRESS 

Attempt to perform replication outside current segment. 

REPLICATION RELOCATION 

Replication may occur only within program part. 
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RULE ABOUT PREFIX VIOLATED 

A class and its prefix must be declared within same block 
head. 

SECOND DECLARATION 

Line on which second element of DOUBLE DECLARATION 
is made. 

SEQUENCE 

Binary tables out of order. 

SOURCE DECK ENDS (MESSAGE) 

Line at which 'EOP 1 is found or forced (appears with every 
compilation). 

SPECIFICATION MISSING 

Specification missing for identifier included as a formal. 

STANDARD FUNCTION PARAM 

Parameter in call to standard procedure of incorrect type. 

‘STEP 1 ELEMENT TYPE 

Third expression in a step element must be arithmetic. 
STOP COMPILATION 

Line at which compilation stops; error messages for other 
lines may be lost. Appears in conjunction with OPERAND 
OVERFLOW, SYSTEM ERROR, etc. 

STRUCTURE CAPACITY 

Compiler capacity to handle a nested structure, such as 
parenthetical statements, exceeded. 

SUBPROGRAM SIZE 

Current subprogram exceeds 128K words. 

SUBSCRIPT TYPE 

All subscript expressions must be arithmetic. 
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•SWITCH’ PARAMETER 

All elements in a switch list must be labels or designational 
expressions. 

SYSTEM ERROR 

Compiler or machine malfunction. 

TERMINATION 

Language construction in source text terminates 
illegally. 

TEXT CHARACTER 

Illegal character or character constant in a tex>t (external 
BCD 12 g ). 

TEXT LENGTH 

Too many characters in text or 1 EOP 1 encountered before 
end of text. 

TEXT TERMINATION 

'EOP' encountered before end of text or character. 

TOO MANY BLOCK LEVELS 

A block structure contains block nested to more than 32 
levels. 

TOO MANY IDENTIFIERS' 

Too many differently spelled identifiers in the program. 

TOO MANY WORKING LOGS 

Too many working locations in excess of declared variables 
required to perform operations specified in this block. 


TYPE 

In a general expression, elements must have same types. 
UNKNOWN PREFIX 

No class identifier declared with that prefix name. 
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UNKNOWN QUALIFIER 

Qualification of a reference variable not defined. 

UNDEFINED 

No external name found during preparation of segment 
file. 

VALUE SPECIFICATION 

value applied for formal parameter whose specification 
does not permit a value (e.g., label). 

'WHILE' ELEMENT TYPE 

Second expression In a while statement of illegal type. 
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OBJECT-TIME DIAGNOSTICS 

Upon normal termination, open files are closed and the following 
message is output to the standard output device: 

END OF SIMULA RUN 

Upon abnormal termination, a diagnostic is printed on the standard 
output device, open files are closed, and a structured dump of infor¬ 
mation relevant to the currently active object is output. The 
structured dump traces the execution path through the blocks in the 
block structure currently active when the error occurred. Information 
relevant to the object is selected from core and printed in the dump 
as follows: 


THIS ERROR OCCURRED AFTER 

LINE xxxx 

IN THE BLOCK ENTERED AT 

LINE xxxx 

(global information) 

(environmental information) 

THIS BLOCK WAS CALLED FROM 

LINE xxxx 

IN THE BLOCK ENTERED AT 

LINE xxxx 

(environmental information) 

THIS BLOCK WAS CALLED FROM 

LINE xxxx 

IN THE BLOCK ENTERED AT 
(environmental information) 

LINE xxxx 


xxxx is the line number assigned each source image line during 
compilation. If the block entered is a standard procedure, the 
word STAN appears instead of the line number. 

ALPHA FORMAT ERROR 

Output value too large. 

ARITHMETIC OVERFLOW 

Evaluation of an expression results in arithmetic overflow 
(e.g., division by zero) for which no provision has been 
made with ARTHOFLW procedure. 

ARRAY BOUNDS ERROR 

Computed element address in an array not within total 
array boundaries. 

ARRAY DECLARE ERROR 

Computed array size is negative or zero. 
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array dimension error 

Actual parameter in a procedure call and formal in proce¬ 
dure declaration. 

data set 

Defines data set on which preceding error occurred. 

DATASET CARD SYNTAX CIRCULAR PARITY EOF 

Either syntax of data set card is wrong or define and equate 
cards result in a circular definition of a data set; or an 
uncorrectable parity error or EOF card occurred during 
reading of data set cards. The incorrect card is output 
before the program is terminated. 

DISPLAY EXCEEDED 

Block structure nested to more than 32 levels; only calls 
to separately compiled procedures can cause this error. 

END INPUT 

Attempt to read a file after encountering an end-of-file. 

EXPONENTIAL ERROR 

Argument of EXP procedure is too large. 

ILLEGAL GOTO 

go to leading to another object, connected or detached, 
the same quasi-parallel system. 

ILLEGAL IN-OUT 

Illegal operation requested for equipment selected. 

INSTANTANEOUS QUALIFICATION 

The attribute does not belong to the class mentioned or to 
one of its subclasses. 

LOCAL REFERENCE 

A local reference to an instance of a prefixed block is 
forbidden. 
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logarithm error 

Argument to LN procedure may not be negative or zero. 
OBJECT NONE 

Attempt to use an attribute of an object with a reference 
pointer to none . 

PARAMETER COUNT ERROR 

Incorrect number of actual parameters in procedure call. 
PARAMETER KIND ERROR 

Actual and formal parameters in procedure not the same 

kind. 

PARAMETER TYPE ERROR 

Actual and formal parameters in procedure call not the sam 
type. 

RESUME - NONE 

Object of a resume statement does not exist. 

RESUME - NOT DETACHED 

Parameter of a resume statement must be a detached object 

RESUME - TERMINATED 

The object of a resume statement is terminated. 

SIMULATION -XX - 

Process implied in procedure XX does not exist within the 
sequencing set. 

SIN - COS ERROR 

Argument to SIN or COS procedure is too large. 

SQUARE ROOT ERROR 

Argument to the SQRT procedure may not be negative. 

STORAGE OVERFLOW 

No more space available. 
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TEXT element error 

Rules of TEXT ELEMENT violated. 

UNASSIGNED DATASET 

No data set defined for a file name used in program. 

UNDEFINED FOR LABEL 

Attempt to jump into middle of for statement. 

VIRTUAL LABEL 

Go to a virtual label not closed. 

VIRTUAL PROCEDURE 

Call on virtual procedure not closed. 
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COMPILE-TIME AND OBJECT-TIME INPUT/ 
OUTPUT DIAGNOSTICS 

System diagnostics concerning input/output usage at compile-time 
and object-time appear in the DAYFILE. 

SIMULA-1/O-ERROR xxx ON FILE file-name 
xxx takes the following values: 


In general, the following values of xxx result from system error, 
improper use of the input/output system in a handwritten procedure. 


or use of the wrong segment file. 


FC1 

Illegal function code to input/outputj 

| 

FC2 

Error on call for open 

1 

> object-time or 

I compile-time 

FC3 

Error on call for close J 


FC4 

Error on reading or writing 


SGI 

Error in the segment file | 

object-time only 

SG2 

Library routine missing from 1 

segment file. ' 


INT 

Error in compiler pass I 

input/output J 

compile-time only 


32 



SIMULA 67 SYNTAX 


*A star indicates a rule which is not part of the ALGOL-60 Report. 

The Backus normal form is used, increased by three meta-operators: 

enclose a group of meta expressions forming a new 
I } meta expression 

_ , enclose an optional group and equivalent to 

L * <empty>l{ } 

... denote a repetition of the preceding group or 
optional group 


<basic symbol> 

::= <letter>| <digit>| 

<logical value>| <del imiter> 

<letter> 

::= AIBIC1DIEIFIGIHIIIJIKI 

LlM! NIOlPlQIRlSlTlUlVl 
W |X|Y|Z!a!b|c Id lelflglhl 

i| j|k|l|m|n|o|p|q|r|s|t|u| 

v | w |x|y|z| 

<digit> 

::= 0 111 21 3141 5 [6l 7 18 19 | 

<logical value> 

::= true [false 

<del imiter> 

::= <operator> |<separator> 1 

<bracket> l<declarator>l 

<specificator> 

<operator> 

::= Arithmetic operator>l 

Relational operator>l 

Oogical operator>l 
<sequential operator>l 

<arithmetic operator> 

::= +I-1XI/I -r 1 t 

<relational operator> 

::=<Algol relational operator>| 
<Simula relational operator> 
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<Algol relational operator 
*<Simula relational operator> 
<logical operator> 

<sequential operator> 

<Algol sequential operator> 
*<Simula sequential operator> 

<separator> 

<bracket> 

<declarator> 

<Algol declarator 

*<Simula declarator 

*<specificator> 

<identifier> 

*<Simula identifier 
*<remote identifier 


::=<l<l = l>l>l^ 

::= is I in |= =!=/= 

::= =1 3 I v! A In 

::= <Algol sequential operator>l 
<Simula sequential operator 

::= go to I if I then I else I for Ido I 
code 

::= inspect | inner 1 new I this I qua I 
activate | reactivate | 
otherwise | delay jat I before | 
after I prior 

|101:1; I :=l 1; -1 step I 

until I while 1 when I comment 

::= (l)l[ I] IT'I begin [ end 

::= <Algol declarator>l 
<5imula declarator 

::= Boolean I integer I real I array I 
switch | procedure 

::= c harac ter | text 1 c I ass | 
ref (<CLASS identifier>)l 
virtual: 

::= label 1 value l name 

::= <letter> l<identifier> 

<letter> !<identifier> <digit> 

::=<identifier> l<remote 
identifier 

::=<simple reference 

expression> * <identifier>l 
<simple text 

expression> • <identifier> 
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<number> : 

:=£ + |-j-<unsigned numbed 

Cunsigned number> : 

:=<decimal numbedl 

<exponent part>l<decimal 
numbed <exponent part> 

<decimal number> : 

:=<unsigned integedi 
<decimal fractiordl 
<unsigned integed <decima 
fraction> 

<exponent part> : 

:= 10 <integer> 

<decimal fractiond : 

:= .<unsigned integed 

Sntegerd : 

:= -pH -]<unsigned integed 

<unsigned infeger> : 

:= {<digit>} ... 

*<text constant : 

:= '{Character WHERE 1 
WRITTEN AS">}... 1 

*<character constantd : 

:= "<character>" 

*<character> : 

:=<ANY CHARACTER 
AVAILABLE, SPACE 
INCLUDE D> 

<variable> : 

:= Simple variabie>l 
Subscripted variabled 

<simple variable> : 

:=<variable identified 

*<variable identified : 

: ; =<Simula identified 

Subscripted variable> : 

:=<array identified 
£ Subscript 1 ist>] 

*<array identified : 

:=<Simula identified 

Subscript list> : 

:= Subscript expressiord! 
Subscript list>. 

Subscript expressiord 

Subscript expressiord : 

:= Arithmetic expressiond 

*<expression> : 

:= Arithmetic expressiord! 
<Boolean expressiord! 
<designational expressiord! 
<reference expressiord! 
<text expressiord! 
<character expressiond! 
<text valued 
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*<Simula function designator 

<arithmetic function designator 

Arithmetic procedure identifier 

<actual parameter part> 

<actual parameter list> 

<parameter delimiter 
<letter string> 

<actual parameter 

<Boolean function designator 

Preference function designator 

Pcharacter function designator 

*<text function designator 

PBoolean procedure identifier 
Preference procedure identifier 


::= Arithmetic function 
designator |<Boo!ean 
function designator I 
<reference function 
designator I Aharacter 
function designator)<text 
function designator 

::= Arithmetic procedure 
identifier>f Actual 
parameter part>{ 

<Simula ARITHMETIC 
identifier 

::= (Actual parameter list>) 

::= Actual parameter| 

Actual parameter list> 
<parameter delimiter 
Actual parameter 

::= , |) Cletter string> : ( 

::= <letter> Kletter string> 

<letter> 

::= <expression>I Array 

identifier>! <switch identifier [ 
<procedure identifier 

<Boolean procedure 
identifier>f Actual param¬ 
eter part>^ 

::= <reference procedure 
identifier>{Actual 
parameter part>{ 

Aharacter procedure 
identifier {Actual 
parameter part>{ 

::=<text procedure identifier 
{Actual parameter part>{ 

::= <Simula BOOLEAN identifiers 

::= <SimuIa REFERENCE 
identifier 
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*<character procedure identified 

::= <Simula CHARACTER 
identified 

*<text procedure identified 

::=<Simula TEXT identified 

*<procedure identified 

::= <Simula PROCEDURE 
identified 

<arithmetic expressioid 

::= : <simple arithmetic 

expression^ <if c!ause> 

<simple arithmetic 
expressiordfelse <arithmetic 
express ion>i 

<simple arithmetic expression^ 

::= <terrri>|<adding operatod 
<term>| <simple arithmetic 
expression> <adding operatod 
<terrh> 

<term> 

: := <factor>| <term> 

<multiplying operatod 
<factor> 

<factor> 

::= <primary>| <factor> t 
<primary> 

<primary> 

::=<unsigned numbed | 

<ARITHMETIC variable>l 
<arithmetic function 
designatod | (<arithmetic 
expression^ 

Multiplying operatod 

::= X|/| ~r 

<adding operatod 

::=+l- 

<if clause> 

::= if <Boolean expressiord then 

<Boolean expression> 

::=<simple Booleard 1 <if clause> 
<simple Booleard-felse 
<Boolean express iord]- 

<simpie Boolean> 

::= <implicatiord Ksimple 
Booleard=<implicatiord 

<implicatiord 

::=<Boolean term> Kimplica- 
tionXX Boo lean terrrd 
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<Boolean term> 

<Boolean factod 

<Boolean secondary> 
<Boolean primary> 

*<relatioh> 


<designational expression^ 

<simple designafional expressiord 

<switch designated 

<switch identified 
<Iabel> 


::=<Boolean factor> | 

<Boolean term>v< Boo lean 
factor> 

::=<Boo!ean secondary>! 

<Boolean factor> A <Boolean 
secondary> 

::= {l} <Boo!ean primary> 

::=<logical value>| 

<BOOLEAN variable>| 
<Boolean function 
designated! <relation>| 
(<Boolean expression>) 

::=<simple arithmetic 
expression> <Algol 
relational operator> 

<simple arithmetic 
expression>l <simple character 
expression>{< |<| = |>l>l^} 
<simple character expression> 
<simple text value> 

{<i<i=I>i>i/} <simple 

text value>l <simple text 
expression>{ ==[=/=} 

<simple text expression>| 
<simple reference 
expression>{{ 

<simple reference expression>l 
{ is|in}<class identified} 

::=<simple designafional 
expression> l<if clause> 
<simple designafional 
expression^ else <designa- 
tional expressiord} 

:: = <label>l<switch designator>[ 
(<designational expression>) 

::=<switch identified 

[<subscript expressiord] 

::= <SWITCH identified 

::=<LABEL identified 
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Preference expression> 

Psimple reference expression> 

^generating reference> 

Plocal reference> 

Pqualified reference> 

Pfext expression> 

Psimple text expression> 

Ptext value> 

Psimple text value> 
Pcharacter expression> 

Psimple character expression> 

Pstatement> 


::=<simple reference 

expression>|<if clause> 
<simple reference 
expression> else <reference 
express ion> 

none I <REF variable>| 
<reference function designa¬ 
tor Kgenerating reference>| 
<local reference>l<qualified 
reference>l preference 
express ion>) 

::= new <CLASS identifier 
£ <actual parameter part>} 

::= this <CLASS identifier 

:: ; =<simple reference expression> 
qua <CLASS identifier 

::=<simple text expression>| 

<if clause> <simpie text 
expression>f else <text 
expression^ 

::= notext |<TEXT variable>l 
<text function designator 
(<text express ion>) 

::=<simple text value>l<if 

clau5e> <simple text value> 
f else <text value>]- 

::=<simp!e text expression>l 
<text constant> 

::=<simple character expressionX 
<if clause> <simple character 
expression>-feIse <character 
expression>} 

::= <character constant>l 
CHARACTER variableX 
<character function designa¬ 
tor! Pcharacter expression>) 

::=<Algoi statement>!<Simula 
state men t> 
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<Algol statement 

Unconditional statement 1 
<conditional statement 

<uncondifionai statement 

::=<basic statementKfor 
statement Kcompound 
statement |<block> 

<basic statement 

::=•} <label> . .{Assignment 

statementKgoto statementI 
<procedure statement} 

<compound statement 

::=-[<label> :}.. . begin 
<compound tail> 

<compound tail> 

<statement> end [ <statement>; 
<compound tail> 

*<block> 

::=■£<label> . .{<block 

prefix>]<block head>; 
<compound tail> 

*<block prefixd 

::= <class identified <actual 
parameter part> 

<block head> 

::= begin <declaration>| 

<block head> ;<dec!aration> 

*<Simula statement 

Aonnection statement>l 
<scheduling statement! 
<denotation statement 

Assignment statement 

::={{<AR!TH. variable>l<ARITH. 
PROCEDURE identified} : =} 

. .. <arithmetic expression> [ 


|{<BOOLEAN variable>l 
<BOOLEAN PROCEDURE 
identified}:^}... <Boolean 
expressiord! 


{{ CHARACTER variable^ 
CHARACTER PROCEDURE 
identified} :=}... 

Aharacter expression>! 


|{<TEXT variable>! <TEXT 
PROCEDURE identified! Ctext 
function designatod} :=}... 
<text value> 

<go to statement 

:: = go to<designationai expression> 
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<procedure statementd 

::= <procedure identified 
<actual parameter pard 

*<procedure identified 

::=<Simula identified 

<actual parameter part> 

::= { (<actual parameted 
^parameter delimited 

Actual parameted}...)} 

<parameter delimited 

::= , 1) Cletter string> :( 

<letter stringd 

::= <letter> ... 

<actual parameted 

::=<expression>l<array identi- 
fier>l<switch identified! 
<procedure identified 

<arith. for list el emend 

::= <arithmetic expressiord 

} while <Boolean expressiord} 

| <arithmetic expressiord step 
<arithmetic expressiord until 
Arithmetic expression> 

<ref. for list element 

::= <reference expressiond} while 
<Boolean expressiond} 

<text for list elemend 

::=<text expressiond}while 
<Boolean expressiord} 

<character for list elemend 

::= <character expressiord 

} while <Boolean expressiord} 

<arith. forclause> 

::= for <ARITH. variabled := 
<arith. for list elemend 
} ,Arith. for list elemend}... 

<ref. for clause> 

::=for<REF. variabled 

<ref. for list elemend}, <ref. 
for list elemend}... 

<text for clause> 

::=for<TEXT variabled:- := 

<text for list elementsd}, <text 
for list elemend}... 

<character for clause> 

::=for<CHAR. variabled : = 
<character for list elemend 
} , <character for list 
elemend}... 
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<for clause> 

<for statement 
*<conditional statement 

<if clause> 

*<unconditional Simula statement 

*<connection statement 
* 

* 

*<scheduling statement 
*<activation clause> 

*<scheduling ciause> 

*<denotation statement 

* 

*<declaration> 


<arith. for clause>l<ref. for 
clause> |<text for clause>l 
<character for clause> 

:■={ <label> .. <for clause> 
<statement> 

..= £<label> . <if clause> 
Unconditional Simula 
statement^ else <statement> } 

::= if <Boolean expression> then 

::= Unconditional statement^ 
<Simula statement 

::= inspect <refe re nee 

express ion >{ do <Cstatement>l 
{ when <CLASS identified do 
<statement>} ...} 

.[otherwise <statement>} 

::= <activation clause> 
<scheduling clause> 

::= { activate l reactivate} 
<reference expression> 

::=}{ before | after } <reference 
expression>| -f at | delay} 
Arithmetic expression> 
f Prior }} 

::= {{<REF. variable>!<REF 
PROCEDURE identified} 

:-}... <reference expressiord 
{{ <TEXT variable>l<TEXT 
PROCEDURE identified} :-} 

... <text express ion> 

:: = <type declaratiord l<array 
dec 1 aratiord !<sw i tch 
declaration>l<procedure 
declaratiotd Kclass 
dec!aration> 
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<type declaration> 

::=<type> <simple Algol 
variable>{, <simple Algol 
variable>]\.. 

*<type> 

::= real [integer| Booleanl charac- 
terltextlref (<CLASS 
identified) 

<simple Algol variable> 

::=<VARIABLE identified 

<array declaratiord 

;;= £<type>]-array <array list> 

<array list> 

::=<array segment>|<array 1 ist>, 
<array segment> 

<array segment 

::={ <ARRAY identified,]- 
<ARRAY identified 
[ <bound pair 1 ist>] 

<bound pair list> 

::=<arithmetic expressiort> : 
<arithmetic expression> 

■£ , <arithmetic expression> : 
<arithmetic expression>}.. . 

<switch declaration> 

::= switch <SWITCH identified : = 
<designational expressiori> 
t , <designationaI expression^ 

<procedure declaratiord 

<type> procedure <procedure 
heading> <procedure body> 

<procedure body> 

:: = <statement>lcode <integer> 
<CODE BODY> 

<procedure heading> 

::= <PROCEDURE identified 
{ { <formal parameter part> ; 

£ <mode part>}<specification 
part>}|;} 

<formal parameter part> 

::= (<formal parameted 
f <parameter delimited 
<formal parameted]-...) 

<formal parameter> 

::= <identifier> 

*<value part> 

::= value identified 
■[ , identified]-... ; 
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Specification part> 

<specifier> 

<name parf> 

Cmode part> 

*<class declaration> 
*<prefix> 

*<main part> 

* 

* 

*<virtual specification part> 

*<virtuai specified 
<spl it body> 


::={ <specifier> <identifier> 

| , <identifier>. 

::= <type>l £<type> }array 1 label 1 
£ <type> £procedure | switch 

:: = name <identifier> 

£ , <identifier>-£.. 

::=<vaiue part>£<name part>£ | 
Cname part>£<value part>^- 

::= £ <p re fix > ^< m ain part> 
::=<CLASS identified 

::= class <CLASS identified 
{{<formal parameter part>; 
£<value part> ^Specification 
part>}[;} 

£ virtual : <virtual specifica¬ 
tion part> ■} 

{<statement>l<split body>} 

{<virtual specified 
<identifier> 

£<identifier>}. . .} ... 

::=£ <type>]- procedure [ label | 
switch 

::= begin £ <declaration>; £. . . 

£ <statement> ; £. .. 
inner 

£ ; <statement>£... end 
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A 1A "'■Us II |V 


CHARACTER REPRESENTATION OF SIMULA 

SYMBOLS 


SIMULA 

symbol 


A -Z 
a - z 
0-9 


X 

/ 


> 


A 

V 


“1 

=/= 

D 

, (comma) 


10 

( 

) 

[ 

] 


(blank) 


Recommended 

keypunch 

Tolerated 

keypunch 

Punch for recom¬ 
mended keypunch 

A - Z 


12-1 -0-9 

0-9 


0-9 

+ 


12 

- 


11 

* 


11-8-4 

/ 


0-1 

t 

'POWER 1 

11 -8-5 

:/ 

1 DIV 1 or 

8-2, 0-1 

> 

'GREATER' 

11-8-7 

> 

■NOT LESS' 

12-8-5 

= 

'EQUAL' 

8-3 

1 = 

'NOT EQUAL' 

12-8-6, 8-3 

< 

'NOT GREATER' 

8-5 

< 

'LESS' 

12-0 

A 

'AND' 

0-8-7 

V 

'OR' 

11-0 

= 

' EQUIV 1 

0-8-6 

= = 

1 IDENT' 

8-3, 8-3 

1 

'NOT' 

12-8-6 

=/= 

■NOT IDENT 1 

8-3, 0-1, 8-3 

— 

1 IMPL' 

0-8-5 



12-8-3 



0-8-3 



8-2 

• 

. 

12-8-7 

1 (apostr.) 


8-4 

( 

) 


0-8-4 


12-8-4 

[ 

(/ 

8-7 

] 

a 

12-8-4 

:= 

. .= or .= 

8-2, 8-3 

: - 

■ • - or . - 

8-2, 11 

1 

1 1 

11-8-6 

m 


11-8-3 















6000 REPRESENTATION OF SIMULA 


SIMULA 

symbol 

6000-Representation 

SIMULA 

symbol 

SYMBOLS 

6000-Representation 

activate 

'ACTIVATE' 

is 

US' 

after 

'AFTER 1 

label 

'LABEL' 

array 

'ARRAY' 

name 

'NAME' 

at 

'AT' 

new 

'NEW' 

before 

'BEFORE' 

none 

'NONE' 

begin 

'BEGIN' 

no text 

' NOTEXT’ 

Boolean 

'BOOLEAN' 

otherwise 

'OTHERWISE' 

character 

'CHARACTER' 

prior 

'PRIOR' 

class 

'CLASS' 

procedure 

'PROCEDURE' 

code 

'CODE' 

qua 

'QUA' 

comment 

'COMMENT' 

reactivate 

'REACTIVATE' 

delay 

'DELAY' 

real 

'REAL' 

delimiter 

'DELIMITER' 

ref 

'REF' 

do 

'DO' 

step 

'STEP' 

else 

'ELSE' 

switch 

'SWITCH' 

end 

'END' 

text 

'TEXT' 

false 

'FALSE' 

then 

'THEN' 

for 

'FOR' 

this 

'THIS' 

go to 

'GOTO' 

true 

'TRUE' 

if 

'IF' 

until 

'UNTIL 1 

in 

'IN' 

value 

'VALUE' 

inner 

'INNER' 

virtual 

'VIRTUAL' 

inspect 

'INSPECT' 

when 

'WHEN' 

integer 

'INTEGER' 

while 

'WHILE' 
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NOTES 





CONTROL DATA 


CO R P OR AT J O N 


• ■ ■ 

3145 Potter Drive 
Palo Alto, California ! 










